home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / pibtscr4.arc / DELPHI.SCR < prev    next >
Encoding:
Text File  |  1986-01-08  |  384 b   |  19 lines
  1. param te=2
  2. clear
  3. dial "7"
  4. MESSAGE "***** DIALING DELPHI (ME) *****"
  5. delay 40
  6. repeat
  7.    stext "|.|" 
  8.    waitstring "service :" 1
  9. until waitstring found
  10. stext "DELPHI|"
  11. waitstring "Username:"
  12. stext "       |"
  13. waitstring "Password: "
  14. stext "         |"
  15. if connected
  16.    key "delphi"
  17.    exit
  18. endif
  19.